function [subdata] = sample_boot(data)
% Bootstrap sample of data (with replacement).
% [subdata] = subsample(data,fraction)
% inputs: data     -> data set with variable (rows are unique data identifiers)
% output: subdata  -> bootstraped sample.
 
n = size(data,1);

sel     = ceil(n*unifrnd(0,1,n,1));	                                         

subdata = data(sel,:);

end

    